home
***
CD-ROM
|
disk
|
FTP
|
other
***
search
/
CD Fun House 1
/
CD Fun House (Wayzata Technology).iso
/
•The Arcade•
/
Battle Mac ••••
/
Battle Mac ееее.rsrc
/
CODE_3.txt
< prev
next >
Wrap
Text File
|
1988-10-24
|
21KB
|
370 lines
# near model CODE resource
# jump table entries: 641-649 (9 of them)
00000000 7406 moveq.l D2, 0x06
label00000002:
00000002 205F movea.l A0, [A7]+
00000004 3F02 move.w -[A7], D2
00000006 2F08 move.l -[A7], A0
00000008 ADED syscall Pack6, auto_pop
0000000A 7408 moveq.l D2, 0x08
0000000C 4EFA FFF4 jmp [PC - 0xC /* 00000002 */]
00000010 7400 moveq.l D2, 0x00
00000012 4EFA FFEE jmp [PC - 0x12 /* 00000002 */]
00000016 740E moveq.l D2, 0x0E
00000018 4EFA FFE8 jmp [PC - 0x18 /* 00000002 */]
0000001C 7402 moveq.l D2, 0x02
0000001E 4EFA FFE2 jmp [PC - 0x1E /* 00000002 */]
00000022 7410 moveq.l D2, 0x10
00000024 4EFA FFDC jmp [PC - 0x24 /* 00000002 */]
00000028 7404 moveq.l D2, 0x04
0000002A 4EFA FFD6 jmp [PC - 0x2A /* 00000002 */]
0000002E 343C 000A move.w D2, 0xA /* '\n' */
00000032 4EFA 0006 jmp [PC + 0x6 /* 0000003A */]
00000036 343C 000C move.w D2, 0xC
label0000003A:
0000003A 205F movea.l A0, [A7]+
0000003C 4EFA 002C jmp [PC + 0x2C /* 0000006A */]
00000040 343C 000A move.w D2, 0xA /* '\n' */
00000044 4EFA 0006 jmp [PC + 0x6 /* 0000004C */]
export_80:
00000048 343C 000C move.w D2, 0xC
label0000004C:
0000004C 226F 0004 movea.l A1, [A7 + 0x4]
00000050 206F 0008 movea.l A0, [A7 + 0x8]
00000054 4240 clr.w D0
00000056 4241 clr.w D1
00000058 1018 move.b D0, [A0]+
0000005A 1219 move.b D1, [A1]+
0000005C 2F48 0008 move.l [A7 + 0x8], A0
00000060 2F49 0004 move.l [A7 + 0x4], A1
00000064 205F movea.l A0, [A7]+
00000066 3F00 move.w -[A7], D0
00000068 3F01 move.w -[A7], D1
label0000006A:
0000006A 43FA 0012 lea.l A1, [PC + 0x12 /* 0000007E, value 0x0, cstring "" */]
0000006E 48D1 0108 movem.l [A1], D3,A0
00000072 3F02 move.w -[A7], D2
00000074 A9ED syscall Pack6
00000076 4CFA 0108 0004 movem.l D3,A0, [PC + 0x4 /* 0000007C, value 0x4ED00000 */]
0000007C 4ED0 jmp [A0]
0000007E 0000 0000 ori.b D0, 0x0
00000082 0000 0000 ori.b D0, 0x0
export_82:
00000086 7401 moveq.l D2, 0x01
label00000088:
00000088 205F movea.l A0, [A7]+
0000008A 3F02 move.w -[A7], D2
0000008C 2F08 move.l -[A7], A0
0000008E ADEA syscall Pack3, auto_pop
00000090 7403 moveq.l D2, 0x03
00000092 4EFA FFF4 jmp [PC - 0xC /* 00000088 */]
export_81:
00000096 7402 moveq.l D2, 0x02
00000098 4EFA FFEE jmp [PC - 0x12 /* 00000088 */]
0000009C 7404 moveq.l D2, 0x04
0000009E 4EFA FFE8 jmp [PC - 0x18 /* 00000088 */]
000000A2 4E56 0000 link A6, 0
000000A6 206E 0010 movea.l A0, [A6 + 0x10]
000000AA 226E 000C movea.l A1, [A6 + 0xC]
000000AE 7000 moveq.l D0, 0x00
000000B0 1018 move.b D0, [A0]+
000000B2 4840 swap.w D0
000000B4 1019 move.b D0, [A1]+
000000B6 4A2E 0008 tst.b [A6 + 0x8]
000000BA 670E beq +0x10 /* 000000CA */
000000BC 4A2E 000A tst.b [A6 + 0xA]
000000C0 6704 beq +0x6 /* 000000C6 */
000000C2 A43C syscall CmpString, flags=4
000000C4 6010 bra +0x12 /* 000000D6 */
label000000C6:
000000C6 A03C syscall CmpString
000000C8 600C bra +0xE /* 000000D6 */
label000000CA:
000000CA 4A2E 000A tst.b [A6 + 0xA]
000000CE 6704 beq +0x6 /* 000000D4 */
000000D0 A23C syscall CmpString, flags=2
000000D2 6002 bra +0x4 /* 000000D6 */
label000000D4:
000000D4 A23C syscall CmpString, flags=2
label000000D6:
000000D6 0A00 0001 xori.b D0, 0x1
000000DA 1D40 0014 move.b [A6 + 0x14], D0
000000DE 4E5E unlink A6
000000E0 205F movea.l A0, [A7]+
000000E2 DFFC 0000 000C add.l A7, 0xC
000000E8 4ED0 jmp [A0]
000000EA 225F movea.l A1, [A7]+
000000EC 121F move.b D1, [A7]+
000000EE 205F movea.l A0, [A7]+
000000F0 7000 moveq.l D0, 0x00
000000F2 1018 move.b D0, [A0]+
000000F4 2F09 move.l -[A7], A1
000000F6 4A01 tst.b D1
000000F8 6704 beq +0x6 /* 000000FE */
000000FA A054 syscall UprString/UprText
000000FC 6002 bra +0x4 /* 00000100 */
label000000FE:
000000FE A254 syscall UprString/UprText, flags=2
label00000100:
00000100 4E75 rts
export_83:
00000102 4E56 0000 link A6, 0
00000106 594F subq.w A7, 4
00000108 2F3C 5354 5223 move.l -[A7], 0x53545223 /* 'STR#' */
0000010E 3F2E 000A move.w -[A7], [A6 + 0xA]
00000112 A9A0 syscall GetResource
00000114 226E 000C movea.l A1, [A6 + 0xC]
00000118 4211 clr.b [A1]
0000011A 201F move.l D0, [A7]+
0000011C 6720 beq +0x22 /* 0000013E */
0000011E 2040 movea.l A0, D0
00000120 2050 movea.l A0, [A0]
00000122 3018 move.w D0, [A0]+
00000124 322E 0008 move.w D1, [A6 + 0x8]
00000128 B240 cmp.w D1, D0
0000012A 6E12 bgt +0x14 /* 0000013E */
0000012C 7000 moveq.l D0, 0x00
label0000012E:
0000012E 5341 subq.w D1, 1
00000130 6706 beq +0x8 /* 00000138 */
00000132 1018 move.b D0, [A0]+
00000134 D1C0 add.l A0, D0
00000136 60F6 bra -0x8 /* 0000012E */
label00000138:
00000138 1010 move.b D0, [A0]
0000013A 5240 addq.w D0, 1
0000013C A02E syscall BlockMove/BlockMoveData
label0000013E:
0000013E 4E5E unlink A6
00000140 205F movea.l A0, [A7]+
00000142 508F addq.l A7, 8
00000144 4ED0 jmp [A0]
export_85:
00000146 51C1 sf D1
00000148 6002 bra +0x4 /* 0000014C */
export_86:
0000014A 50C1 st D1
label0000014C:
0000014C 4E56 FFCE link A6, -0x0032
00000150 41EE FFCE lea.l A0, [A6 - 0x32]
00000154 216E 0008 0020 move.l [A0 + 0x20], [A6 + 0x8]
0000015A 316E 0010 0018 move.w [A0 + 0x18], [A6 + 0x10]
00000160 226E 000C movea.l A1, [A6 + 0xC]
00000164 2151 0024 move.l [A0 + 0x24], [A1]
00000168 4268 002C clr.w [A0 + 0x2C]
0000016C 42A8 002E clr.l [A0 + 0x2E]
00000170 4A01 tst.b D1
00000172 6604 bne +0x6 /* 00000178 */
00000174 A002 syscall Read
00000176 6002 bra +0x4 /* 0000017A */
label00000178:
00000178 A003 syscall Write
label0000017A:
0000017A 3D40 0012 move.w [A6 + 0x12], D0
0000017E 226E 000C movea.l A1, [A6 + 0xC]
00000182 22A8 0028 move.l [A1], [A0 + 0x28]
00000186 4E5E unlink A6
00000188 225F movea.l A1, [A7]+
0000018A DFFC 0000 000A add.l A7, 0xA /* '\n' */
00000190 4ED1 jmp [A1]
00000192 4E56 FFC0 link A6, -0x0040
00000196 41EE FFC0 lea.l A0, [A6 - 0x40]
0000019A 216E 0010 0012 move.l [A0 + 0x12], [A6 + 0x10]
000001A0 316E 0014 0016 move.w [A0 + 0x16], [A6 + 0x14]
000001A6 4268 001C clr.w [A0 + 0x1C]
000001AA A007 syscall GetVolInfo/PBHGetVInfo/HGetVInfo
000001AC 3D40 0016 move.w [A6 + 0x16], D0
000001B0 226E 000C movea.l A1, [A6 + 0xC]
000001B4 32A8 0016 move.w [A1], [A0 + 0x16]
000001B8 2028 0030 move.l D0, [A0 + 0x30]
000001BC E080 asr D0, 8
000001BE E280 asr D0, 1
000001C0 C0E8 003E mulu.w D0, [A0 + 0x3E]
000001C4 E380 asl D0, 1
000001C6 E180 asl D0, 8
000001C8 226E 0008 movea.l A1, [A6 + 0x8]
000001CC 2280 move.l [A1], D0
000001CE 4E5E unlink A6
000001D0 225F movea.l A1, [A7]+
000001D2 DFFC 0000 000E add.l A7, 0xE
000001D8 4ED1 jmp [A1]
000001DA 4E56 FFC0 link A6, -0x0040
000001DE 41EE FFC0 lea.l A0, [A6 - 0x40]
000001E2 216E 000C 0012 move.l [A0 + 0x12], [A6 + 0xC]
000001E8 A014 syscall GetVol/PBHGetVol/HGetVol
000001EA 3D40 0010 move.w [A6 + 0x10], D0
000001EE 226E 0008 movea.l A1, [A6 + 0x8]
000001F2 32A8 0016 move.w [A1], [A0 + 0x16]
000001F6 4E5E unlink A6
000001F8 225F movea.l A1, [A7]+
000001FA 508F addq.l A7, 8
000001FC 4ED1 jmp [A1]
000001FE 4E56 FFC0 link A6, -0x0040
00000202 41EE FFC0 lea.l A0, [A6 - 0x40]
00000206 216E 000A 0012 move.l [A0 + 0x12], [A6 + 0xA]
0000020C 316E 0008 0016 move.w [A0 + 0x16], [A6 + 0x8]
00000212 A015 syscall SetVol/PBHSetVol/HSetVol
00000214 3D40 000E move.w [A6 + 0xE], D0
00000218 4E5E unlink A6
0000021A 225F movea.l A1, [A7]+
0000021C 5C8F addq.l A7, 6
0000021E 4ED1 jmp [A1]
00000220 4E56 FFC0 link A6, -0x0040
00000224 41EE FFC0 lea.l A0, [A6 - 0x40]
00000228 316E 0008 0016 move.w [A0 + 0x16], [A6 + 0x8]
0000022E 216E 000A 0012 move.l [A0 + 0x12], [A6 + 0xA]
00000234 A013 syscall FlushVol
00000236 3D40 000E move.w [A6 + 0xE], D0
0000023A 4E5E unlink A6
0000023C 225F movea.l A1, [A7]+
0000023E 5C8F addq.l A7, 6
00000240 4ED1 jmp [A1]
export_84:
00000242 4E56 FFB0 link A6, -0x0050
00000246 41EE FFB0 lea.l A0, [A6 - 0x50]
0000024A 216E 0012 0012 move.l [A0 + 0x12], [A6 + 0x12]
00000250 316E 0010 0016 move.w [A0 + 0x16], [A6 + 0x10]
00000256 4228 001A clr.b [A0 + 0x1A]
0000025A A008 syscall Create/PBHCreate/HCreate
0000025C 4A40 tst.w D0
0000025E 6616 bne +0x18 /* 00000276 */
00000260 4268 001C clr.w [A0 + 0x1C]
00000264 A00C syscall GetFileInfo/PBHGetFInfo/HGetFileInfo
00000266 2008 move.l D0, A0
00000268 43E8 0020 lea.l A1, [A0 + 0x20]
0000026C 22EE 0008 move.l [A1]+, [A6 + 0x8]
00000270 22AE 000C move.l [A1], [A6 + 0xC]
00000274 A00D syscall SetFileInfo/PBHSetFInfo/HSetFileInfo
label00000276:
00000276 3D40 0016 move.w [A6 + 0x16], D0
0000027A 4E5E unlink A6
0000027C 225F movea.l A1, [A7]+
0000027E DFFC 0000 000E add.l A7, 0xE
00000284 4ED1 jmp [A1]
export_87:
00000286 4E56 FFCE link A6, -0x0032
0000028A 41EE FFCE lea.l A0, [A6 - 0x32]
0000028E 216E 000E 0012 move.l [A0 + 0x12], [A6 + 0xE]
00000294 316E 000C 0016 move.w [A0 + 0x16], [A6 + 0xC]
0000029A 4228 001A clr.b [A0 + 0x1A]
0000029E 4228 001B clr.b [A0 + 0x1B]
000002A2 42A8 001C clr.l [A0 + 0x1C]
000002A6 A000 syscall Open/PBHOpen/HOpen
000002A8 226E 0008 movea.l A1, [A6 + 0x8]
000002AC 32A8 0018 move.w [A1], [A0 + 0x18]
000002B0 3D40 0012 move.w [A6 + 0x12], D0
000002B4 4E5E unlink A6
000002B6 205F movea.l A0, [A7]+
000002B8 DFFC 0000 000A add.l A7, 0xA /* '\n' */
000002BE 4ED0 jmp [A0]
000002C0 4E56 FFCE link A6, -0x0032
000002C4 41EE FFCE lea.l A0, [A6 - 0x32]
000002C8 316E 000C 0018 move.w [A0 + 0x18], [A6 + 0xC]
000002CE A018 syscall GetFPos
000002D0 3D40 000E move.w [A6 + 0xE], D0
000002D4 226E 0008 movea.l A1, [A6 + 0x8]
000002D8 22A8 002E move.l [A1], [A0 + 0x2E]
000002DC 4E5E unlink A6
000002DE 225F movea.l A1, [A7]+
000002E0 5C8F addq.l A7, 6
000002E2 4ED1 jmp [A1]
000002E4 4E56 FFCE link A6, -0x0032
000002E8 41EE FFCE lea.l A0, [A6 - 0x32]
000002EC 316E 000E 0018 move.w [A0 + 0x18], [A6 + 0xE]
000002F2 316E 000C 002C move.w [A0 + 0x2C], [A6 + 0xC]
000002F8 216E 0008 002E move.l [A0 + 0x2E], [A6 + 0x8]
000002FE A044 syscall SetFPos
00000300 3D40 0010 move.w [A6 + 0x10], D0
00000304 4E5E unlink A6
00000306 225F movea.l A1, [A7]+
00000308 508F addq.l A7, 8
0000030A 4ED1 jmp [A1]
0000030C 4E56 FFCE link A6, -0x0032
00000310 41EE FFCE lea.l A0, [A6 - 0x32]
00000314 316E 000C 0018 move.w [A0 + 0x18], [A6 + 0xC]
0000031A A011 syscall GetEOF
0000031C 3D40 000E move.w [A6 + 0xE], D0
00000320 226E 0008 movea.l A1, [A6 + 0x8]
00000324 22A8 001C move.l [A1], [A0 + 0x1C]
00000328 4E5E unlink A6
0000032A 225F movea.l A1, [A7]+
0000032C 5C8F addq.l A7, 6
0000032E 4ED1 jmp [A1]
00000330 4E56 FFCE link A6, -0x0032
00000334 41EE FFCE lea.l A0, [A6 - 0x32]
00000338 316E 000C 0018 move.w [A0 + 0x18], [A6 + 0xC]
0000033E 216E 0008 001C move.l [A0 + 0x1C], [A6 + 0x8]
00000344 A012 syscall SetEOF
00000346 3D40 000E move.w [A6 + 0xE], D0
0000034A 4E5E unlink A6
0000034C 225F movea.l A1, [A7]+
0000034E 5C8F addq.l A7, 6
00000350 4ED1 jmp [A1]
export_88:
00000352 4E56 FFCE link A6, -0x0032
00000356 41EE FFCE lea.l A0, [A6 - 0x32]
0000035A 316E 0008 0018 move.w [A0 + 0x18], [A6 + 0x8]
00000360 A001 syscall Close
00000362 3D40 000A move.w [A6 + 0xA], D0
00000366 4E5E unlink A6
00000368 205F movea.l A0, [A7]+
0000036A 548F addq.l A7, 2
0000036C 4ED0 jmp [A0]
0000036E 4E56 FFB0 link A6, -0x0050
00000372 41EE FFB0 lea.l A0, [A6 - 0x50]
00000376 216E 000E 0012 move.l [A0 + 0x12], [A6 + 0xE]
0000037C 316E 000C 0016 move.w [A0 + 0x16], [A6 + 0xC]
00000382 4228 001A clr.b [A0 + 0x1A]
00000386 4268 001C clr.w [A0 + 0x1C]
0000038A A00C syscall GetFileInfo/PBHGetFInfo/HGetFileInfo
0000038C 3D40 0012 move.w [A6 + 0x12], D0
00000390 41E8 0020 lea.l A0, [A0 + 0x20]
00000394 226E 0008 movea.l A1, [A6 + 0x8]
00000398 303C 0010 move.w D0, 0x10
0000039C A02E syscall BlockMove/BlockMoveData
0000039E 4E5E unlink A6
000003A0 225F movea.l A1, [A7]+
000003A2 DFFC 0000 000A add.l A7, 0xA /* '\n' */
000003A8 4ED1 jmp [A1]
000003AA 4E56 FFB0 link A6, -0x0050
000003AE 41EE FFB0 lea.l A0, [A6 - 0x50]
000003B2 216E 000E 0012 move.l [A0 + 0x12], [A6 + 0xE]
000003B8 316E 000C 0016 move.w [A0 + 0x16], [A6 + 0xC]
000003BE 4228 001A clr.b [A0 + 0x1A]
000003C2 4268 001C clr.w [A0 + 0x1C]
000003C6 A00C syscall GetFileInfo/PBHGetFInfo/HGetFileInfo
000003C8 43E8 0020 lea.l A1, [A0 + 0x20]
000003CC 206E 0008 movea.l A0, [A6 + 0x8]
000003D0 303C 0010 move.w D0, 0x10
000003D4 A02E syscall BlockMove/BlockMoveData
000003D6 41EE FFB0 lea.l A0, [A6 - 0x50]
000003DA A00D syscall SetFileInfo/PBHSetFInfo/HSetFileInfo
000003DC 3D40 0012 move.w [A6 + 0x12], D0
000003E0 4E5E unlink A6
000003E2 225F movea.l A1, [A7]+
000003E4 DFFC 0000 000A add.l A7, 0xA /* '\n' */
000003EA 4ED1 jmp [A1]
000003EC 4E56 FFCE link A6, -0x0032
000003F0 41EE FFCE lea.l A0, [A6 - 0x32]
000003F4 216E 000E 0012 move.l [A0 + 0x12], [A6 + 0xE]
000003FA 316E 000C 0016 move.w [A0 + 0x16], [A6 + 0xC]
00000400 4228 001A clr.b [A0 + 0x1A]
00000404 216E 0008 001C move.l [A0 + 0x1C], [A6 + 0x8]
0000040A A00B syscall Rename/PBHRename/HRename
0000040C 3D40 0012 move.w [A6 + 0x12], D0
00000410 4E5E unlink A6
00000412 225F movea.l A1, [A7]+
00000414 DFFC 0000 000A add.l A7, 0xA /* '\n' */
0000041A 4ED1 jmp [A1]
0000041C 4E56 FFCE link A6, -0x0032
00000420 41EE FFCE lea.l A0, [A6 - 0x32]
00000424 216E 000A 0012 move.l [A0 + 0x12], [A6 + 0xA]
0000042A 316E 0008 0016 move.w [A0 + 0x16], [A6 + 0x8]
00000430 4228 001A clr.b [A0 + 0x1A]
00000434 A009 syscall Delete/PBHDelete/HDelete
00000436 3D40 000E move.w [A6 + 0xE], D0
0000043A 4E5E unlink A6
0000043C 225F movea.l A1, [A7]+
0000043E 5C8F addq.l A7, 6
00000440 4ED1 jmp [A1]